options(device=function()pdf(file=file.path(Sys.getenv()['HOME'],'simidev.pdf')))